home *** CD-ROM | disk | FTP | other *** search
INI File | 2001-02-07 | 27.4 KB | 510 lines |
- [script]
- n0=; ===[ This script was coded by sPD aka avi hirsh, please credit me for what you rip.. SPD@HOTMAIL.CO.IL :]===
- n1=
- n2=alias sPDeng {
- n3= unset %spdeng
- n4= set %spdeng $1
- n5= set %spdeng $upper(%spdeng)
- n6= set %spdeng $replace(%spdeng,.,/)
- n7= return %spdeng
- n8=}
- n9=
- n10=alias spdip {
- n11= unset %spdip
- n12= set %spdip $1
- n13= set %spdip $replace(%spdip,.,/)
- n14= return %spdip
- n15=}
- n16=
- n17=alias makeSPD { /getSPD | set %spd.mk.temp $active | /editbox %spd.mk.temp | unset %spd.mk.temp }
- n18=alias getSPD {
- n19= unset %SPDvar1
- n20= unset %SPDvar2
- n21= unset %SPDvar3
- n22= unset %SPDvar4
- n23= unset %SPDvar5
- n24= unset %SPDvar6
- n25= unset %SPDvar7
- n26= unset %SPDvar8
- n27= unset %SPDvar9
- n28= set %temp_get $sline($active,1).ln
- n29= if (%temp_get == $null) editbox $active
- n30= else { %_NickPos = $pos($line($active,%temp_get,1),.,1) + 2
- n31= %_NickLen = $mid($line($active,%temp_get,1),%_NickPos,0)
- n32= %SPDvar1 = $mid($line($active,%temp_get,1),%_NickPos,%_NickLen))
- n33= %isP = yes
- n34= editbox -p $active \⌠°ΦΘ: $putname($wallaHebToEng(%SPDvar1))
- n35= }
- n36= set %temp_get $sline($active,2).ln
- n37= if (%temp_get == $null) editbox $active
- n38= else { %_NickPos = $pos($line($active,%temp_get,1),.,1) + 2
- n39= %_NickLen = $mid($line($active,%temp_get,1),%_NickPos,0)
- n40= %SPDvar2 = $mid($line($active,%temp_get,1),%_NickPos,%_NickLen))
- n41= %isP = yes
- n42= editbox -p $active \⌠°ΦΘ: $putname($wallaHebToEng(%SPDvar2))
- n43= }
- n44= set %temp_get $sline($active,3).ln
- n45= if (%temp_get == $null) editbox $active
- n46= else { %_NickPos = $pos($line($active,%temp_get,1),.,1) + 2
- n47= %_NickLen = $mid($line($active,%temp_get,1),%_NickPos,0)
- n48= %SPDvar3 = $mid($line($active,%temp_get,1),%_NickPos,%_NickLen))
- n49= %isP = yes
- n50= editbox -p $active \⌠°ΦΘ: $putname($wallaHebToEng(%SPDvar3))
- n51= }
- n52= set %temp_get $sline($active,4).ln
- n53= if (%temp_get == $null) editbox $active
- n54= else { %_NickPos = $pos($line($active,%temp_get,1),.,1) + 2
- n55= %_NickLen = $mid($line($active,%temp_get,1),%_NickPos,0)
- n56= %SPDvar4 = $mid($line($active,%temp_get,1),%_NickPos,%_NickLen))
- n57= %isP = yes
- n58= editbox -p $active \⌠°ΦΘ: $putname($wallaHebToEng(%SPDvar4))
- n59= }
- n60= set %temp_get $sline($active,5).ln
- n61= if (%temp_get == $null) editbox $active
- n62= else { %_NickPos = $pos($line($active,%temp_get,1),.,1) + 2
- n63= %_NickLen = $mid($line($active,%temp_get,1),%_NickPos,0)
- n64= %SPDvar5 = $mid($line($active,%temp_get,1),%_NickPos,%_NickLen))
- n65= %isP = yes
- n66= editbox -p $active \⌠°ΦΘ: $putname($wallaHebToEng(%SPDvar5))
- n67= }
- n68= set %temp_get $sline($active,6).ln
- n69= if (%temp_get == $null) editbox $active
- n70= else { %_NickPos = $pos($line($active,%temp_get,1),.,1) + 2
- n71= %_NickLen = $mid($line($active,%temp_get,1),%_NickPos,0)
- n72= %SPDvar6 = $mid($line($active,%temp_get,1),%_NickPos,%_NickLen))
- n73= %isP = yes
- n74= editbox -p $active \⌠°ΦΘ: $putname($wallaHebToEng(%SPDvar6))
- n75= }
- n76= set %temp_get $sline($active,7).ln
- n77= if (%temp_get == $null) editbox $active
- n78= else { %_NickPos = $pos($line($active,%temp_get,1),.,1) + 2
- n79= %_NickLen = $mid($line($active,%temp_get,1),%_NickPos,0)
- n80= %SPDvar7 = $mid($line($active,%temp_get,1),%_NickPos,%_NickLen))
- n81= %isP = yes
- n82= editbox -p $active \⌠°ΦΘ: $putname($wallaHebToEng(%SPDvar7))
- n83= }
- n84= set %temp_get $sline($active,8).ln
- n85= if (%temp_get == $null) editbox $active
- n86= else { %_NickPos = $pos($line($active,%temp_get,1),.,1) + 2
- n87= %_NickLen = $mid($line($active,%temp_get,1),%_NickPos,0)
- n88= %SPDvar8 = $mid($line($active,%temp_get,1),%_NickPos,%_NickLen))
- n89= %isP = yes
- n90= editbox -p $active \⌠°ΦΘ: $putname($wallaHebToEng(%SPDvar8))
- n91= }
- n92= set %temp_get $sline($active,9).ln
- n93= if (%temp_get == $null) editbox $active
- n94= else { %_NickPos = $pos($line($active,%temp_get,1),.,1) + 2
- n95= %_NickLen = $mid($line($active,%temp_get,1),%_NickPos,0)
- n96= %SPDvar9 = $mid($line($active,%temp_get,1),%_NickPos,%_NickLen))
- n97= %isP = yes
- n98= editbox -p $active \⌠°ΦΘ: $putname($wallaHebToEng(%SPDvar9))
- n99= }
- n100= unset %temp_get
- n101=}
- n102=
- n103=alias spd.dns.go {
- n104= if (%spd.dns.active == TRUE) { set %spd.tempo *** Σ·≡Γ∙σ· ß≈∙σ· SND α≡α τδΣ ∙Σß≈∙Σ Σ≈σπε· ·±·ΘΘφ | spdSHOWALL 0 4 $wallahebrew($len(%spd.tempo),$wallareversed(%spd.tempo)) | unset %spd.tempo | halt }
- n105=
- n106= set %spd.dns.active TRUE
- n107= /dns $1
- n108=
- n109=}
- n110=
- n111=on 1:DNS:{
- n112=
- n113= if (%spd.dns.loop == $null) { set %spd.dns.loop 0 }
- n114= else { inc %spd.dns.loop }
- n115= if (%spd.dns.ip == $iaddress) && (%spd.dns.loop > 2) { set %temp.check 1 | dec %spd.dns.loop }
- n116= if ( ·ß isin %spd.dns.ip) { set %temp.check 1 | inc %spd.dns.loop }
- n117=
- n118= if ( $naddress == $null ) { set %temp.addr $wallareversed(αΘ α⌠∙° ∞Σ⌠σΩ δ·σß· ) }
- n119= else { set %temp.addr $naddress }
- n120= if ( $iaddress == $null ) { set %temp.ip $wallareversed(αΘ α⌠∙° ∞Σ⌠σΩ δ·σß· ) }
- n121= else { set %temp.ip $iaddress }
- n122=
- n123= if (%temp.check == 1) {
- n124= if (%spd.dns.nick != $null) { set %spd.tempo *** τΘ⌠σ∙ Σσ⌠≥∞ ≥∞ $wallaname(%spd.dns.nick) | spdSHOWALL 0 4 $wallahebrew($len(%spd.tempo),$wallareversed(%spd.tempo)) | unset %spd.tempo }
- n125= set %spd.tempo *** δ·σß· ßε±⌠°Θφ: $wallareversed($spdip(%temp.ip))
- n126= spdSHOWALL 0 13 $wallahebrew($len(%spd.tempo),$wallareversed(%spd.tempo))
- n127= unset %spd.tempo
- n128= if ( ·ß isin %spd.dns.ip) { set %spd.tempo *** δ·σß· ßεΘ∞Θφ: $wallareversed($spdeng(%spd.dns.addr)) | spdSHOWALL 0 13 $wallahebrew($len(%spd.tempo),$wallareversed(%spd.tempo)) | unset %spd.tempo }
- n129= else { set %spd.tempo *** δ·σß· ßεΘ∞Θφ: $wallareversed($spdeng(%temp.addr)) | spdSHOWALL 0 13 $wallahebrew($len(%spd.tempo),$wallareversed(%spd.tempo)) | unset %spd.tempo }
- n130= if ($iaddress != $null) { set %spd.tempo *** δ·σß· α°σδΣ: $wallareversed($longip($iaddress)) | spdSHOWALL 0 13 $wallahebrew($len(%spd.tempo),$wallareversed(%spd.tempo)) | unset %spd.tempo }
- n131= else { set %spd.tempo *** δ·σß· α°σδΣ: αΘ α⌠∙° ∞Σ⌠σΩ δ·σß· | spdSHOWALL 0 13 $wallahebrew($len(%spd.tempo),$wallareversed(%spd.tempo)) | unset %spd.tempo }
- n132= set %spd.tempo *** τΘ⌠σ∙ Σσ∙∞φ ∞ατ° %spd.dns.loop ≈⌠Θ÷σ·
- n133= spdSHOWALL 0 4 $wallahebrew($len(%spd.tempo),$wallareversed(%spd.tempo))
- n134= unset %spd.tempo
- n135= }
- n136=
- n137= set %spd.dns.ip %temp.ip
- n138= set %spd.dns.addr %temp.addr
- n139= unset %temp.ip
- n140= unset %temp.addr
- n141= if (%temp.check != 1) { /dns %spd.dns.ip }
- n142= else { unset %spd.dns.loop | unset %spd.dns.ip | unset %spd.dns.addr | unset %spd.dns.active | unset %spd.dns.nick }
- n143= unset %temp.check
- n144=
- n145=}
- n146=
- n147=on *:VOICE:#: {
- n148= if ($vnick !isop $chan(#)) {
- n149= wallareplace $vnick $vnick $spdwin
- n150= if ($nick == $server) { %temp.nick = var, }
- n151= else { %temp.nick = $nick }
- n152= set %spd.tempo *** $wallaname($vnick) ehck +V n $+ $wallaname(%temp.nick)
- n153= if ($vnick == $me) && (%spd.display.sound == ON) {
- n154= %t = $rand(1,10)
- n155= if (%t > 5) { .splay sound\voice.wav }
- n156= else { .splay sound\voice2.wav }
- n157= unset %t
- n158= }
- n159= spdecho %spd.color.action $spdwin $wallahebrew($len(%spd.tempo),%spd.tempo)
- n160= unset %spd.tempo
- n161= unset %temp.nick
- n162= }
- n163=}
- n164=
- n165=on *:DEVOICE:#:{
- n166= if ($vnick !isop $chan(#)) {
- n167= wallareplace $vnick $vnick $spdwin
- n168= if ($nick == $server) { %temp.nick = var, }
- n169= else { %temp.nick = $nick }
- n170= set %spd.tempo *** $wallaname(%temp.nick) vxhr +V n $+ $wallaname($vnick)
- n171= if ($vnick == $me) && (%spd.display.sound == ON) { .splay sound\damn.wav }
- n172= spdecho %spd.color.action $spdwin $wallahebrew($len(%spd.tempo),%spd.tempo)
- n173= %unset %spd.tempo
- n174= unset %temp.nick
- n175= }
- n176=}
- n177=
- n178=alias spd.mass.all {
- n179= set %chan $chan($mid($active,9,50))
- n180= set %counter 1
- n181= set %spd.mass.msg $1-
- n182= :allloop
- n183= .msg $nick(%chan,%counter) $wallahebtoeng(%spd.mass.msg)
- n184= inc %counter
- n185= if ($nick(%chan,%counter) != $null) { goto allloop }
- n186= unset %spd.mass.msg
- n187= ; dec %counter
- n188= .spdecho 6 $mid($active,9,50) . %counter :α≡∙Θφ ∙≈Θß∞σ α· ΣΣσπ≥Σ ***
- n189= unset %counter
- n190= unset %chan
- n191=}
- n192=
- n193=alias spd.mass.ops {
- n194= set %chan $chan($mid($active,9,50))
- n195= set %counter 1
- n196= set %spd.mass.msg $1-
- n197= set %spd.mass.msg.counter 0
- n198= :allloop
- n199= if ($nick(%chan,%counter) isop %chan) { .msg $nick(%chan,%counter) $wallahebtoeng(%spd.mass.msg) | inc %spd.mass.ops.counter }
- n200= inc %counter
- n201= if ($nick(%chan,%counter) != $null) { goto allloop }
- n202= unset %spd.mass.msg
- n203= dec %counter
- n204= spdecho 6 $mid($active,9,50) . %spd.mass.ops.counter :α≡∙Θφ ∙≈Θß∞σ α· ΣΣσπ≥Σ ***
- n205= unset %counter
- n206= unset %chan
- n207= unset %spd.mass.ops.counter
- n208=}
- n209=
- n210=alias spd.mass.notops {
- n211= set %chan $chan($mid($active,9,50))
- n212= set %counter 1
- n213= set %spd.mass.msg $1-
- n214= set %spd.mass.notops.counter 0
- n215= :allloop
- n216= if ($nick(%chan,%counter) !isop %chan) { .msg $nick(%chan,%counter) $wallahebtoeng(%spd.mass.msg) | inc %spd.mass.notops.counter }
- n217= inc %counter
- n218= if ($nick(%chan,%counter) != $null) { goto allloop }
- n219= unset %spd.mass.msg
- n220= ; dec %counter
- n221= .spdecho 6 $mid($active,9,50) . %spd.mass.notops.counter :α≡∙Θφ ∙≈Θß∞σ α· ΣΣσπ≥Σ ***
- n222= unset %counter
- n223= unset %chan
- n224= unset %spd.mass.notops.counter
- n225=}
- n226=
- n227=alias spd.notice.mass.all {
- n228= set %chan $chan($mid($active,9,50))
- n229= set %counter 1
- n230= set %spd.mass.msg $wallahebtoeng($1-)
- n231= :allloop
- n232= .notice $nick(%chan,%counter) %spd.mass.msg
- n233= inc %counter
- n234= if ($nick(%chan,%counter) != $null) { goto allloop }
- n235= unset %spd.mass.msg
- n236= ; dec %counter
- n237= .spdecho 6 $mid($active,9,50) . %counter :α≡∙Θφ ∙≈Θß∞σ α· ΣΣσπ≥Σ ***
- n238= unset %counter
- n239= unset %chan
- n240=}
- n241=
- n242=alias spd.notice.mass.ops {
- n243= set %chan $chan($mid($active,9,50))
- n244= set %counter 1
- n245= set %spd.mass.msg $wallahebtoeng($1-)
- n246= set %spd.mass.msg.counter 0
- n247= :allloop
- n248= if ($nick(%chan,%counter) isop %chan) { .notice $nick(%chan,%counter) %spd.mass.msg | inc %spd.mass.ops.counter }
- n249= inc %counter
- n250= if ($nick(%chan,%counter) != $null) { goto allloop }
- n251= unset %spd.mass.msg
- n252= dec %counter
- n253= .spdecho 6 $mid($active,9,50) . %spd.mass.ops.counter :α≡∙Θφ ∙≈Θß∞σ α· ΣΣσπ≥Σ ***
- n254= unset %counter
- n255= unset %chan
- n256= unset %spd.mass.ops.counter
- n257=}
- n258=
- n259=alias spd.notice.mass.notops {
- n260= set %chan $chan($mid($active,9,50))
- n261= set %counter 1
- n262= set %spd.mass.msg $wallahebtoeng($1-)
- n263= set %spd.mass.notops.counter 0
- n264= :allloop
- n265= if ($nick(%chan,%counter) !isop %chan) { .notice $nick(%chan,%counter) %spd.mass.msg | inc %spd.mass.notops.counter }
- n266= inc %counter
- n267= if ($nick(%chan,%counter) != $null) { goto allloop }
- n268= unset %spd.mass.msg
- n269= ; dec %counter
- n270= .spdecho 6 $mid($active,9,50) . %spd.mass.notops.counter :α≡∙Θφ ∙≈Θß∞σ α· ΣΣσπ≥Σ ***
- n271= unset %counter
- n272= unset %chan
- n273= unset %spd.mass.notops.counter
- n274=}
- n275=
- n276=alias spd.ctcp.mass.all {
- n277= set %chan $chan($mid($active,9,50))
- n278= set %counter 1
- n279= set %spd.mass.msg $wallahebtoeng($1-)
- n280= :allloop
- n281= .ctcp $nick(%chan,%counter) %spd.mass.msg
- n282= inc %counter
- n283= if ($nick(%chan,%counter) != $null) { goto allloop }
- n284= unset %spd.mass.msg
- n285= ; dec %counter
- n286= .spdecho 6 $mid($active,9,50) . %counter :α≡∙Θφ ∙≈Θß∞σ α· ΣΣσπ≥Σ ***
- n287= unset %counter
- n288= unset %chan
- n289=}
- n290=
- n291=alias spd.ctcp.mass.ops {
- n292= set %chan $chan($mid($active,9,50))
- n293= set %counter 1
- n294= set %spd.mass.msg $wallahebtoeng($1-)
- n295= set %spd.mass.msg.counter 0
- n296= :allloop
- n297= if ($nick(%chan,%counter) isop %chan) { .ctcp $nick(%chan,%counter) %spd.mass.msg | inc %spd.mass.ops.counter }
- n298= inc %counter
- n299= if ($nick(%chan,%counter) != $null) { goto allloop }
- n300= unset %spd.mass.msg
- n301= dec %counter
- n302= .spdecho 6 $mid($active,9,50) . %spd.mass.ops.counter :α≡∙Θφ ∙≈Θß∞σ α· ΣΣσπ≥Σ ***
- n303= unset %counter
- n304= unset %chan
- n305= unset %spd.mass.ops.counter
- n306=}
- n307=
- n308=alias spd.ctcp.mass.notops {
- n309= set %chan $chan($mid($active,9,50))
- n310= set %counter 1
- n311= set %spd.mass.msg $wallahebtoeng($1-)
- n312= set %spd.mass.notops.counter 0
- n313= :allloop
- n314= if ($nick(%chan,%counter) !isop %chan) { .ctcp $nick(%chan,%counter) %spd.mass.msg | inc %spd.mass.notops.counter }
- n315= inc %counter
- n316= if ($nick(%chan,%counter) != $null) { goto allloop }
- n317= unset %spd.mass.msg
- n318= ; dec %counter
- n319= .spdecho 6 $mid($active,9,50) . %spd.mass.notops.counter :α≡∙Θφ ∙≈Θß∞σ α· ΣΣσπ≥Σ ***
- n320= unset %counter
- n321= unset %chan
- n322= unset %spd.mass.notops.counter
- n323=}
- n324=
- n325=alias f2 {
- n326= if ($server) { set %spd.tempo fcr njucr kar, | spdSHOWALL 0 4 $wallahebrew($len(%spd.tempo),$wallareversed(%spd.tempo)) | unset %spd.tempo }
- n327= else { set %spd.tempo ε≡±Σ ∞Σ·τß° ∞ $+ MF99UB | spdSHOWALL 0 4 %spd.tempo | unset %spd.tempo | /server 192.115.207.224 4470 }
- n328=}
- n329=alias f3 { run notepad spd\personal.spd }
- n330=
- n331=on *:TEXT:*:?:{
- n332= if (%away != on) && (%away != off) { set %away off }
- n333= if (%away == $null ) { set %away off }
- n334=
- n335= if (%away == on) {
- n336= if (%awaymsg == $null) { set %awaymsg nhs tjzur// }
- n337= if (%awaymsg != $null) { .msg $nick $wallahebtoeng($replace(%awaymsg,.,/)) }
- n338= }
- n339=
- n340= if (%spd.flood.ignore == $null) { set %spd.flood.ignore 30 }
- n341= if (%spd.flood.msg == NORMAL) {
- n342= if ([ %spd.msg. [ $+ [ $nick ] ] ] == $null) { /set %spd.msg. [ $+ [ $nick ] ] 0 | .timer 1 8 /unset %spd.msg. [ $+ [ $nick ] ] }
- n343= if ([ %spd.msg. [ $+ [ $nick ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! }
- n344= if ([ %spd.msg. [ $+ [ $nick ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 1 | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.msg. [ $+ [ $nick ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
- n345= }
- n346=
- n347= if (%spd.flood.msg == HIGH) {
- n348= if ([ %spd.msg. [ $+ [ $site ] ] ] == $null) { /set %spd.msg. [ $+ [ $site ] ] 0 | .timer 1 8 /unset %spd.msg. [ $+ [ $site ] ] }
- n349= if ([ %spd.msg. [ $+ [ $site ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! }
- n350= if ([ %spd.msg. [ $+ [ $site ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 2 | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.msg. [ $+ [ $site ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
- n351= }
- n352=
- n353= if (%spd.flood.msg == NORMAL) { inc %spd.msg. [ $+ [ $nick ] ] 1 }
- n354= if (%spd.flood.msg == HIGH) { inc %spd.msg. [ $+ [ $site ] ] 1 }
- n355=}
- n356=
- n357=on *:CHAT:*: {
- n358= if (%spd.flood.ignore == $null) { set %spd.flood.ignore 30 }
- n359= if (%spd.flood.dcc == NORMAL) {
- n360= if ([ %spd.dcc. [ $+ [ $nick ] ] ] == $null) { /set %spd.dcc. [ $+ [ $nick ] ] 0 | .timer 1 8 /unset %spd.dcc. [ $+ [ $nick ] ] }
- n361= if ([ %spd.dcc. [ $+ [ $nick ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! }
- n362= if ([ %spd.dcc. [ $+ [ $nick ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 1 | close -c $nick | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.dcc. [ $+ [ $nick ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
- n363= }
- n364=
- n365= if (%spd.flood.dcc == HIGH) {
- n366= if ([ %spd.dcc. [ $+ [ $site ] ] ] == $null) { /set %spd.dcc. [ $+ [ $site ] ] 0 | .timer 1 8 /unset %spd.dcc. [ $+ [ $site ] ] }
- n367= if ([ %spd.dcc. [ $+ [ $site ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! }
- n368= if ([ %spd.dcc. [ $+ [ $site ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 2 | close -c $nick | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.dcc. [ $+ [ $site ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
- n369= }
- n370=
- n371= if (%spd.flood.dcc == NORMAL) { inc %spd.dcc. [ $+ [ $nick ] ] 1 }
- n372= if (%spd.flood.dcc == HIGH) { inc %spd.dcc. [ $+ [ $site ] ] 1 }
- n373=}
- n374=
- n375=on 1:NOTICE:*:*: {
- n376= if (%spd.visible.notice == ON) { spdSHOWON 0 %spd.color.notice $nick $nick *Σ·°≥Σ* - $+ $wallaname($nick) $+ - $1- }
- n377=
- n378= if (%spd.flood.ignore == $null) { set %spd.flood.ignore 30 }
- n379= if (%spd.flood.notice == NORMAL) {
- n380= if ([ %spd.notice. [ $+ [ $nick ] ] ] == $null) { /set %spd.notice. [ $+ [ $nick ] ] 0 | .timer 1 8 /unset %spd.notice. [ $+ [ $nick ] ] }
- n381= if ([ %spd.notice. [ $+ [ $nick ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! }
- n382= if ([ %spd.notice. [ $+ [ $nick ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 1 | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.notice. [ $+ [ $nick ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
- n383= }
- n384=
- n385= if (%spd.flood.notice == HIGH) {
- n386= if ([ %spd.notice. [ $+ [ $site ] ] ] == $null) { /set %spd.notice. [ $+ [ $site ] ] 0 | .timer 1 8 /unset %spd.notice. [ $+ [ $site ] ] }
- n387= if ([ %spd.notice. [ $+ [ $site ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! }
- n388= if ([ %spd.notice. [ $+ [ $site ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 2 | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.notice. [ $+ [ $site ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
- n389= }
- n390=
- n391= if (%spd.flood.notice == NORMAL) { inc %spd.notice. [ $+ [ $nick ] ] 1 }
- n392= if (%spd.flood.notice == HIGH) { inc %spd.notice. [ $+ [ $site ] ] 1 }
- n393=}
- n394=
- n395=on 1:ACTION:*:*: {
- n396= if (%spd.visible.action == ON) { spdSHOWON 0 11 $nick $nick * $wallaname($nick) $replace($1-,q,·) }
- n397=
- n398= if (%spd.flood.ignore == $null) { set %spd.flood.ignore 30 }
- n399= if (%spd.flood.action == NORMAL) {
- n400= if ([ %spd.action. [ $+ [ $nick ] ] ] == $null) { /set %spd.action. [ $+ [ $nick ] ] 0 | .timer 1 8 /unset %spd.action. [ $+ [ $nick ] ] }
- n401= if ([ %spd.action. [ $+ [ $nick ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! }
- n402= if ([ %spd.action. [ $+ [ $nick ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 1 | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.action. [ $+ [ $nick ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
- n403= }
- n404=
- n405= if (%spd.flood.action == HIGH) {
- n406= if ([ %spd.action. [ $+ [ $site ] ] ] == $null) { /set %spd.action. [ $+ [ $site ] ] 0 | .timer 1 8 /unset %spd.action. [ $+ [ $site ] ] }
- n407= if ([ %spd.action. [ $+ [ $site ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! }
- n408= if ([ %spd.action. [ $+ [ $site ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore /60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 2 | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.action. [ $+ [ $site ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
- n409= }
- n410=
- n411= if (%spd.flood.action == NORMAL) { inc %spd.action. [ $+ [ $nick ] ] 1 }
- n412= if (%spd.flood.action == HIGH) { inc %spd.action. [ $+ [ $site ] ] 1 }
- n413=}
- n414=
- n415=ctcp *:*:*: {
- n416= if ($1 == VERSION) || ($1 == DCC) || ($1 == FINGER) || ($1 == TIME) || ($1 == PING) {
- n417= if (%spd.visible.ctcp == ON) { spdSHOWON 0 %spd.color.ctcp $nick $nick *⌠Θ≡Γ* ] $+ $wallaname($nick) $+ [ $wallareversed($spdip($upper($1-))) }
- n418= }
- n419= else { if (%spd.visible.ctcp == ON) { spdSHOWON 0 %spd.color.ctcp $nick $nick *⌠Θ≡Γ* ] $+ $wallaname($nick) $+ [ $1- } }
- n420=
- n421= if (%spd.flood.ignore == $null) { set %spd.flood.ignore 30 }
- n422= if (%spd.flood.ctcp == NORMAL) {
- n423= if ([ %spd.ctcp. [ $+ [ $nick ] ] ] == $null) { /set %spd.ctcp. [ $+ [ $nick ] ] 0 | .timer 1 8 /unset %spd.ctcp. [ $+ [ $nick ] ] }
- n424= if ([ %spd.ctcp. [ $+ [ $nick ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! }
- n425= if ([ %spd.ctcp. [ $+ [ $nick ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore /60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 1 | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.ctcp. [ $+ [ $nick ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
- n426= }
- n427=
- n428= if (%spd.flood.ctcp == HIGH) {
- n429= if ([ %spd.ctcp. [ $+ [ $site ] ] ] == $null) { /set %spd.ctcp. [ $+ [ $site ] ] 0 | .timer 1 8 /unset %spd.ctcp. [ $+ [ $site ] ] }
- n430= if ([ %spd.ctcp. [ $+ [ $site ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! }
- n431= if ([ %spd.ctcp. [ $+ [ $site ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 2 | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.ctcp. [ $+ [ $site ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
- n432= }
- n433=
- n434= if (%spd.flood.ctcp == NORMAL) { inc %spd.ctcp. [ $+ [ $nick ] ] 1 }
- n435= if (%spd.flood.ctcp == HIGH) { inc %spd.ctcp. [ $+ [ $site ] ] 1 }
- n436=}
- n437=
- n438=
- n439=on *:ctcpreply:*: {
- n440= if (%spd.visible.ctcp == ON) { spdSHOWON 0 %spd.color.ctcp $nick $nick *·∙σß· ⌠Θ≡Γ* ] $+ $wallaname($nick) $+ [ $wallareversed($spdip($upper($2-))) }
- n441=}
- n442=
- n443=on *:MODE:*: {
- n444= if (%spd.display.mode == ON) && (%io == on) {
- n445= set %spd.tempo *** $nick ecg\v cgru. $wallareversed($upper($1-))
- n446= /spdecho %spd.color.mode $spdwin $wallahebrew($len(%spd.tempo),%spd.tempo)
- n447= unset %spd.tempo
- n448= }
- n449=}
- n450=
- n451=on *:SERVERMODE:*: {
- n452= if (%spd.display.mode == ON) && (%io == on) {
- n453= set %spd.tempo *** var, ecg\v cgru. $wallareversed($upper($1-))
- n454= /spdecho %spd.color.mode $spdwin $wallahebrew($len(%spd.tempo),%spd.tempo)
- n455= unset %spd.tempo
- n456= }
- n457=}
- n458=
- n459=on *:TOPIC:*: { set %spd.tempo *** $nick nabv t, vfu,r,: $wallahebtoeng($upper($1-)) | /spdecho 4 $spdwin $wallahebrew($len(%spd.tempo),%spd.tempo) | unset %spd.tempo }
- n460=on *:IGNORE:*: { set %spd.tempo *** $nick v,gknu, $wallareversed($upper($1-)) | /spdecho 4 $spdwin $wallahebrew($len(%spd.tempo),%spd.tempo) | unset %spd.tempo }
- n461=
- n462=on *:BAN:#: {
- n463= if ($nick == $server) { %temp.nick = var, }
- n464= else { %temp.nick = $nick }
- n465= set %spd.tempo *** $wallareversed($spdeng($banmask)) vux; krahn, vctbho gk hsh $wallaname(%temp.nick)
- n466= if (%spd.display.ban == ON ) && (%io == on) spdecho %spd.color.ban $spdwin $wallahebrew($len(%spd.tempo),%spd.tempo)
- n467= unset %spd.tempo
- n468= unset %temp.nick
- n469=}
- n470=
- n471=on *:UNBAN:#: {
- n472= if ($nick == $server) { %temp.nick = var, }
- n473= else { %temp.nick = $nick }
- n474= set %spd.tempo *** $wallareversed($spdeng($banmask)) vurs nrahn, vctbho gk hsh $wallaname(%temp.nick)
- n475= if (%spd.display.ban == ON ) && (%io == on) spdecho %spd.color.ban $spdwin $wallahebrew($len(%spd.tempo),%spd.tempo)
- n476= unset %spd.tempo
- n477= unset %temp.nick
- n478=}
- n479=
- n480=alias f10 {
- n481= if ($server) { /pass $$?="Σ≈∙ ±Θ±εΣ" }
- n482=}
- n483=
- n484=raw 512:*: {
- n485= set %spd.tempo *** ≥∞ ∙φ µΣ Θ∙ ±Θ±εΣ - α≡α Σ≈∙ α· Σ±Θ±εΣ δπΘ ∞Σε∙ΘΩ )01F(
- n486= /spdSHOWALL 0 4 %spd.tempo
- n487= unset %spd.tempo
- n488= /timer 1 0 f10
- n489=}
- n490=raw 510:*: { set %spd.tempo *** Σ≈∙ ±Θ±εΣ ßδπΘ ∞Σε∙ΘΩ! | /spdSHOWALL 0 4 %spd.tempo | unset %spd.tempo }
- n491=raw 298:*: { set %spd.tempo *** ±Θ±εΣ ∞α ≡τσ÷Σ - ∙Θ≡σΘ ∞- $+ $wallaname($2) | /spdSHOWALL 0 4 %spd.tempo | unset %spd.tempo }
- n492=raw 296:*: { set %spd.tempo *** ±Θ±εΣ Σσ≈∙Σ ßΣ÷∞τΣ ∞δΘ≡σΘ $wallaname($2) | /spdSHOWALL 0 4 %spd.tempo | unset %spd.tempo }
- n493=raw 324:*: if ($mid($active,9,1) == $chr(35)) { set %spd.tempo *** ε÷ßΘφ ß≥°σ⌡: $wallareversed($upper($3)) | /spdecho 4 $mid($active,9,50) $wallahebrew($len(%spd.tempo),%spd.tempo) | unset %spd.tempo }
- n494=raw 251:*: { set %spd.tempo *** Θ∙ δ°Γ≥ $wallareversed($4) ε∙·ε∙Θφ °ΓΘ∞Θφ - $wallareversed($7) ß∞·Θ ≡°αΘφ - $wallareversed($10) ∙°·Θφ | /spdecho 4 $mid($active,9,50) $wallahebrew($len(%spd.tempo),%spd.tempo) | unset %spd.tempo }
- n495=raw 252:*: { set %spd.tempo *** $wallareversed($2) απεΘ≡Θφ ετσß°Θφ δ≥· | /spdecho 4 $mid($active,9,50) $wallahebrew($len(%spd.tempo),%spd.tempo) | unset %spd.tempo }
- n496=raw 254:*: { set %spd.tempo *** $wallareversed($2) ≥°σ÷Θφ | /spdecho 4 $mid($active,9,50) $wallahebrew($len(%spd.tempo),%spd.tempo) | unset %spd.tempo }
- n497=raw 265:*: { set %spd.tempo *** $wallareversed($5) ε∙·ε∙Θφ ≈ΘΘεΘφ - ε≈±Θεσφ $wallareversed($7) | /spdecho 4 $mid($active,9,50) $wallahebrew($len(%spd.tempo),%spd.tempo) | unset %spd.tempo }
- n498=raw 391:*: { set %spd.tempo *** Σµε∩ ß∙°· Σσα $wallareversed($8) | /spdecho 4 $mid($active,9,50) $wallahebrew($len(%spd.tempo),%spd.tempo) | unset %spd.tempo }
- n499=raw 297:*: { set %spd.tempo *** ±Θ±εΣ ∞α ≡δσ≡Σ - ≡±Σ ∙σß ασ ∙≡Σ ∙φ! | /spdSHOWALL 0 4 %spd.tempo | unset %spd.tempo }
- n500=
- n501=raw 315:*: {
- n502= if (%spd.ircop.clonescan != $null) {
- n503= ; echo 4 @iRCOP-CONSOLe cLONE SCANNED: %spd.ircop.clonescan.count
- n504= unset %spd.ircop.clonescan.count
- n505= unset %spd.ircop.clonescan
- n506= }
- n507=}
-